home *** CD-ROM | disk | FTP | other *** search
/ Shareware Super Platinum 8 / Shareware Super Platinum 8.iso / mac / PROGTOOL / TWEAK16B.ZIP;1 / TWKUSER.C < prev    next >
Encoding:
C/C++ Source or Header  |  1993-06-07  |  3.1 KB  |  135 lines
  1. #include <stdio.h>
  2. #include <stdlib.h>
  3. #include <dos.h>
  4. #include <io.h>
  5. #include <fcntl.h>
  6.  
  7. #include "TwkUser.h"
  8.  
  9. /*
  10.     readyVgaRegs() does the initialization to make the VGA ready to
  11.     accept any combination of configuration register settings.
  12.  
  13.     This involves enabling writes to index 0 to 7 of the CRT controller
  14.     (port 0x3d4), by clearing the most significant bit (bit 7) of index
  15.     0x11.
  16. */
  17.  
  18. void readyVgaRegs(void)
  19.     {
  20.     int v;
  21.     outportb(0x3d4,0x11);
  22.     v = inportb(0x3d5) & 0x7f;
  23.     outportb(0x3d4,0x11);
  24.     outportb(0x3d5,v);
  25.     }
  26.  
  27. /*
  28.     outReg sets a single register according to the contents of the
  29.     passed Register structure.
  30. */
  31.  
  32. void outReg(Register r)
  33.     {
  34.     switch (r.port)
  35.         {
  36.         /* First handle special cases: */
  37.  
  38.         case ATTRCON_ADDR:
  39.             inportb(STATUS_ADDR);          /* reset read/write flip-flop */
  40.             outportb(ATTRCON_ADDR, r.index | 0x20);
  41.                                         /* ensure VGA output is enabled */
  42.             outportb(ATTRCON_ADDR, r.value);
  43.             break;
  44.  
  45.         case MISC_ADDR:
  46.         case VGAENABLE_ADDR:
  47.             outportb(r.port, r.value);    /*    directly to the port */
  48.             break;
  49.  
  50.         case SEQ_ADDR:
  51.         case GRACON_ADDR:
  52.         case CRTC_ADDR:
  53.         default:                        /* This is the default method: */
  54.             outportb(r.port, r.index);    /*    index to port               */
  55.             outportb(r.port+1, r.value);/*    value to port+1            */
  56.             break;
  57.         }
  58.     }
  59.  
  60.  
  61. /*
  62.     outRegArray sets n registers according to the array pointed to by r.
  63.     First, indexes 0-7 of the CRT controller are enabled for writing.
  64. */
  65.  
  66. void outRegArray(Register *r, int n)
  67.     {
  68.     readyVgaRegs();
  69.     while (n--)
  70.         outReg(*r++);
  71.     }
  72.  
  73.  
  74. /*
  75.     loadRegArray opens the given file, does some validity checking, then
  76.     reads the entire file into an array of Registers, which is returned
  77.     via the array parameter.
  78.  
  79.     You will probably want to provide your own error handling code in
  80.     this function, as it never aborts the program, rather than just
  81.     printing an error message and returning NULL.
  82.  
  83.     The returned value is the number of Registers read.  The &array
  84.     parameter is set to the allocated Register array.
  85.  
  86.     If you use this function, remember to free() the returned array
  87.     pointer, as it was allocated dynamically using malloc() (unless NULL
  88.     is returned, which designates an error)!
  89. */
  90.  
  91. int loadRegArray(char *fpath, RegisterPtr *array)
  92.     {
  93.     int handle, regs;
  94.     long fsize;
  95.     *array = NULL;
  96.  
  97.     if ((handle = open(fpath, O_BINARY | O_RDONLY)) == -1)
  98.         /* error opening file */
  99.         /* include your error handling code here */
  100.         goto fileerror;
  101.  
  102.     if ((fsize = filelength(handle)) == -1)
  103.         /* error acquiring file size */
  104.         goto fileerror;
  105.     if (fsize % sizeof(Register))
  106.         {
  107.         printf("Illegal TWEAK file size: %s\n", fpath);
  108.         return 0;
  109.         }
  110.     regs = fsize / sizeof(Register);
  111.  
  112.     if (!(*array = (Register *)malloc(fsize)))
  113.         {
  114.         printf("Out of memory allocating buffer for %s\n", fpath);
  115.         return 0;
  116.         }
  117.     if (read(handle, (void*)*array, fsize) == -1)
  118.         /* error reading file */
  119.         goto fileerror;
  120.  
  121.     if (close(handle) == -1)
  122.         {
  123.         /* error closing file */
  124.         goto fileerror;
  125.         }
  126.  
  127.     /* file read ok, return pointer to buffer */
  128.     return regs;
  129.  
  130. fileerror:
  131.     perror(fpath);
  132.     if (*array) free(*array);
  133.     return 0;
  134.     }
  135.